program WPDDemo; uses Forms, uMain in 'uMain.pas' {frmMain}; {$R *.res} begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.Title := 'Portable Devices API Demo'; Application.CreateForm(TfrmMain, frmMain); Application.Run; end.